From 59c6a78e58ec2dc5ab4c409cd92509c49acb3487 Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Wed, 28 Apr 1993 17:33:42 +0000 Subject: [PATCH] (file-truename): Undo last change. --- lisp/files.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 75e91e6b83d..b0f92ed0bb5 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -314,10 +314,7 @@ The truename of a file name is found by chasing symbolic links both at the level of the file and at the level of the directories containing it, until no links are left at any level." (if (string= filename "~") - (progn - (setq filename (expand-file-name filename)) - (if (string= filename "") - (setq filename "/")))) + (setq filename (expand-file-name filename))) (let ((handler (find-file-name-handler filename))) ;; For file name that has a special handler, call handler. ;; This is so that ange-ftp can save time by doing a no-op. -- 2.30.2